(gnus-emphasis-alist): Don't use caddr.

diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el
index 239d6f23043c1d51490e8baff8d01d0647c23aa1..5430fd7afb5a3bceea11ac372c85951157bf379f 100644 (file)
--- a/lisp/gnus/gnus-art.el
+++ b/lisp/gnus/gnus-art.el
@@ -191,7 +191,7 @@ asynchronously.      The compressed face will be piped to this command."
         (lambda (spec)
           (list
            (format format (car spec) (cadr spec))
-           2 3 (intern (format "gnus-emphasis-%s" (caddr spec)))))
+           2 3 (intern (format "gnus-emphasis-%s" (car (cddr spec))))))
         types)))
   "Alist that says how to fontify certain phrases.
 Each item looks like this: